﻿Public Class frmMensajesHistorial 



    Private Sub frmMensajesHistorial_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Try
            'TODO: This line of code loads data into the 'DbFireAndIceDataSet.usuarios' table. You can move, or remove it, as needed.
            Me.UsuariosTableAdapter.Fill(Me.DbFireAndIceDataSet.usuarios)
            'TODO: This line of code loads data into the 'DbFireAndIceDataSet.tmensajes' table. You can move, or remove it, as needed.
            Me.TmensajesTableAdapter.Fill(Me.DbFireAndIceDataSet.tmensajes)
        Catch ex As Exception
            LogSGS.RegistrarLogYEnviarCorreo(My.Resources.StringGlobal.prgVinicio, "Load del formulario de Historial de mensajes", ex, My.Resources.StringGlobal.mdlGeneral, Name, "Load")
        End Try
       

    End Sub

    Private Sub SimpleButton1_Click(sender As System.Object, e As System.EventArgs) Handles SimpleButton1.Click
        TmensajesGridControl.ShowPrintPreview()
    End Sub
End Class